home *** CD-ROM | disk | FTP | other *** search
/ CD Fun House 1 / CD Fun House (Wayzata Technology).iso / •Interesting Stuff• / Fish •••• / Fish! / Fish!.rsrc / INIT_128.txt < prev    next >
Text File  |  1989-10-24  |  10KB  |  181 lines
  1. start:
  2. 00000000  600E                     bra        +0x10 /* 00000010 */
  3. 00000002  0000 494E                ori.b      D0, 0x4E /* 'N' */
  4. 00000006  4954                     chk.w      D4, [A4]
  5. 00000008  0080 0000 0000           ori.l      D0, 0x0
  6. 0000000E  0000 41FA                ori.b      D0, 0xFA
  7. // begin alternate branch 00000010-00000014
  8. label00000010:
  9. 00000010  41FA FFEE                lea.l      A0, [PC - 0x12 /* 00000000, value 0x600E0000 */]
  10. // end alternate branch 00000010-00000014
  11. label00000010: // (misaligned)
  12. 00000012  FFEE                     .invalid   <<F/7/7>>
  13. 00000014  4E71                     nop
  14. 00000016  4E71                     nop
  15. 00000018  6000 0082                bra        +0x84 /* 0000009C */
  16. fn0000001C:
  17. 0000001C  4E56 FFF4                link       A6, -0x000C
  18. 00000020  42B8 09EE                clr.l      [0x000009EE /* GrayRgn */]
  19. 00000024  42A7                     clr.l      -[A7]
  20. 00000026  A8D8                     syscall    NewRgn
  21. 00000028  205F                     movea.l    A0, [A7]+
  22. 0000002A  2D48 FFF8                move.l     [A6 - 0x8], A0
  23. 0000002E  B0FC 0000                cmpa.w     A0, 0x0
  24. 00000032  6700 0064                beq        +0x66 /* 00000098 */
  25. 00000036  42A7                     clr.l      -[A7]
  26. 00000038  A8D8                     syscall    NewRgn
  27. 0000003A  205F                     movea.l    A0, [A7]+
  28. 0000003C  2D48 FFF4                move.l     [A6 - 0xC], A0
  29. 00000040  B0FC 0000                cmpa.w     A0, 0x0
  30. 00000044  6752                     beq        +0x54 /* 00000098 */
  31. 00000046  42A7                     clr.l      -[A7]
  32. 00000048  AA29                     syscall    GetDeviceList
  33. 0000004A  205F                     movea.l    A0, [A7]+
  34. 0000004C  2D48 FFFC                move.l     [A6 - 0x4], A0
  35. 00000050  602C                     bra        +0x2E /* 0000007E */
  36. label00000052:
  37. 00000052  206E FFFC                movea.l    A0, [A6 - 0x4]
  38. 00000056  2F2E FFF4                move.l     -[A7], [A6 - 0xC]
  39. 0000005A  2050                     movea.l    A0, [A0]
  40. 0000005C  4868 0022                pea.l      [A0 + 0x22]
  41. 00000060  A8DF                     syscall    RectRgn
  42. 00000062  2F2E FFF8                move.l     -[A7], [A6 - 0x8]
  43. 00000066  2F2E FFF4                move.l     -[A7], [A6 - 0xC]
  44. 0000006A  2F2E FFF8                move.l     -[A7], [A6 - 0x8]
  45. 0000006E  A8E5                     syscall    UnionRgn
  46. 00000070  42A7                     clr.l      -[A7]
  47. 00000072  2F2E FFFC                move.l     -[A7], [A6 - 0x4]
  48. 00000076  AA2B                     syscall    GetNextDevice
  49. 00000078  205F                     movea.l    A0, [A7]+
  50. 0000007A  2D48 FFFC                move.l     [A6 - 0x4], A0
  51. label0000007E:
  52. 0000007E  4AAE FFFC                tst.l      [A6 - 0x4]
  53. 00000082  66CE                     bne        -0x30 /* 00000052 */
  54. 00000084  4267                     clr.w      -[A7]
  55. 00000086  2F2E FFF8                move.l     -[A7], [A6 - 0x8]
  56. 0000008A  A8E2                     syscall    EmptyRgn
  57. 0000008C  101F                     move.b     D0, [A7]+
  58. 0000008E  4A00                     tst.b      D0
  59. 00000090  6606                     bne        +0x8 /* 00000098 */
  60. 00000092  21EE FFF8 09EE           move.l     [0x000009EE /* GrayRgn */], [A6 - 0x8]
  61. label00000098:
  62. 00000098  4E5E                     unlink     A6
  63. 0000009A  4E75                     rts
  64. label0000009C:
  65. 0000009C  4E56 FFE2                link       A6, -0x001E
  66. 000000A0  4267                     clr.w      -[A7]
  67. 000000A2  A974                     syscall    Button
  68. 000000A4  101F                     move.b     D0, [A7]+
  69. 000000A6  4A00                     tst.b      D0
  70. 000000A8  6712                     beq        +0x14 /* 000000BC */
  71. label000000AA:
  72. 000000AA  3F3C 0002                move.w     -[A7], 0x2
  73. 000000AE  A9C8                     syscall    SysBeep
  74. 000000B0  3F3C 0080                move.w     -[A7], 0x80
  75. 000000B4  4EBA 0058                jsr        [PC + 0x58 /* 0000010E */]
  76. 000000B8  548F                     addq.l     A7, 2
  77. 000000BA  604E                     bra        +0x50 /* 0000010A */
  78. label000000BC:
  79. 000000BC  41EE FFE2                lea.l      A0, [A6 - 0x1E]
  80. 000000C0  303C 0001                move.w     D0, 0x1
  81. 000000C4  A090                     syscall    SysEnvirons
  82. 000000C6  3D40 FFFE                move.w     [A6 - 0x2], D0
  83. 000000CA  4A6E FFFE                tst.w      [A6 - 0x2]
  84. 000000CE  6DDA                     blt        -0x24 /* 000000AA */
  85. 000000D0  42A7                     clr.l      -[A7]
  86. 000000D2  4879 436F 6465           push.l     0x436F6465 /* 'Code' */
  87. 000000D8  4267                     clr.w      -[A7]
  88. 000000DA  A9A0                     syscall    GetResource
  89. 000000DC  205F                     movea.l    A0, [A7]+
  90. 000000DE  2D48 FFF6                move.l     [A6 - 0xA], A0
  91. 000000E2  B0FC 0000                cmpa.w     A0, 0x0
  92. 000000E6  67C2                     beq        -0x3C /* 000000AA */
  93. 000000E8  4A2E FFEB                tst.b      [A6 - 0x15]
  94. 000000EC  6704                     beq        +0x6 /* 000000F2 */
  95. 000000EE  4EBA FF2C                jsr        [PC - 0xD4 /* 0000001C */]
  96. label000000F2:
  97. 000000F2  206E FFF6                movea.l    A0, [A6 - 0xA]
  98. 000000F6  A025                     syscall    GetHandleSize
  99. 000000F8  91B8 010C                sub.l      [0x0000010C /* BufPtr */], D0
  100. 000000FC  2050                     movea.l    A0, [A0]
  101. 000000FE  2278 010C                movea.l    A1, [0x0000010C /* BufPtr */]
  102. 00000102  A02E                     syscall    BlockMove/BlockMoveData
  103. 00000104  4E91                     jsr        [A1]
  104. 00000106  4A40                     tst.w      D0
  105. 00000108  67A0                     beq        -0x5E /* 000000AA */
  106. label0000010A:
  107. 0000010A  4E5E                     unlink     A6
  108. 0000010C  4E75                     rts
  109. fn0000010E:
  110. 0000010E  4E56 FEA4                link       A6, -0x015C
  111. 00000112  42A7                     clr.l      -[A7]
  112. 00000114  4879 4943 4E23           push.l     0x49434E23 /* 'ICN#' */
  113. 0000011A  3F2E 0008                move.w     -[A7], [A6 + 0x8]
  114. 0000011E  A9A0                     syscall    GetResource
  115. 00000120  205F                     movea.l    A0, [A7]+
  116. 00000122  2D48 FEBA                move.l     [A6 - 0x146], A0
  117. 00000126  B0FC 0000                cmpa.w     A0, 0x0
  118. 0000012A  6700 00BE                beq        +0xC0 /* 000001EA */
  119. 0000012E  2F38 0904                move.l     -[A7], [0x00000904 /* CurrentA5 */]
  120. 00000132  2F0D                     move.l     -[A7], A5
  121. 00000134  4BEE FFFC                lea.l      A5, [A6 - 0x4]
  122. 00000138  21CD 0904                move.l     [0x00000904 /* CurrentA5 */], A5
  123. 0000013C  486E FFF8                pea.l      [A6 - 0x8]
  124. 00000140  A86E                     syscall    InitGraf
  125. 00000142  486E FEBE                pea.l      [A6 - 0x142]
  126. 00000146  A86F                     syscall    OpenPort
  127. 00000148  3038 092C                move.w     D0, [0x0000092C]
  128. 0000014C  3200                     move.w     D1, D0
  129. 0000014E  E359                     rol        D1.w, 1
  130. 00000150  0A41 1021                xori.w     D1, 0x1021
  131. 00000154  B278 092E                cmp.w      D1, [0x0000092E]
  132. 00000158  6710                     beq        +0x12 /* 0000016A */
  133. 0000015A  3038 0A7E                move.w     D0, [0x00000A7E]
  134. 0000015E  0CB8 5061 756C 0A78      cmpi.l     [0x00000A78 /* ApplScratch */], 0x5061756C /* 'Paul' */
  135. 00000166  6702                     beq        +0x4 /* 0000016A */
  136. 00000168  7008                     moveq.l    D0, 0x08
  137. label0000016A:
  138. 0000016A  4840                     swap.w     D0
  139. 0000016C  302E FEC6                move.w     D0, [A6 - 0x13A]
  140. 00000170  5040                     addq.w     D0, 8
  141. 00000172  4840                     swap.w     D0
  142. 00000174  3200                     move.w     D1, D0
  143. 00000176  0641 0028                addi.w     D1, 0x28 /* '(' */
  144. 0000017A  31C1 092C                move.w     [0x0000092C], D1
  145. 0000017E  E359                     rol        D1.w, 1
  146. 00000180  0A41 1021                xori.w     D1, 0x1021
  147. 00000184  31C1 092E                move.w     [0x0000092E], D1
  148. 00000188  43EE FEAC                lea.l      A1, [A6 - 0x154]
  149. 0000018C  2F09                     move.l     -[A7], A1
  150. 0000018E  486E FF7E                pea.l      [A6 - 0x82]
  151. 00000192  206E FEBA                movea.l    A0, [A6 - 0x146]
  152. 00000196  2050                     movea.l    A0, [A0]
  153. 00000198  D0FC 0080                add.w      A0, 0x80
  154. 0000019C  22C8                     move.l     [A1]+, A0
  155. 0000019E  32FC 0004                move.w     [A1]+, 0x4
  156. 000001A2  2F09                     move.l     -[A7], A1
  157. 000001A4  4299                     clr.l      [A1]+
  158. 000001A6  22BC 0020 0020           move.l     [A1], 0x200020 /* ' \0 ' */
  159. 000001AC  43EE FEA4                lea.l      A1, [A6 - 0x15C]
  160. 000001B0  2F09                     move.l     -[A7], A1
  161. 000001B2  22C0                     move.l     [A1]+, D0
  162. 000001B4  0680 0020 0020           addi.l     D0, 0x200020 /* ' \0 ' */
  163. 000001BA  2280                     move.l     [A1], D0
  164. 000001BC  3F3C 0003                move.w     -[A7], 0x3
  165. 000001C0  42A7                     clr.l      -[A7]
  166. 000001C2  A8EC                     syscall    CopyBits
  167. 000001C4  43EE FEAC                lea.l      A1, [A6 - 0x154]
  168. 000001C8  2F09                     move.l     -[A7], A1
  169. 000001CA  0491 0000 0080           subi.l     [A1], 0x80
  170. 000001D0  486E FF7E                pea.l      [A6 - 0x82]
  171. 000001D4  486E FEB2                pea.l      [A6 - 0x14E]
  172. 000001D8  486E FEA4                pea.l      [A6 - 0x15C]
  173. 000001DC  3F3C 0001                move.w     -[A7], 0x1
  174. 000001E0  42A7                     clr.l      -[A7]
  175. 000001E2  A8EC                     syscall    CopyBits
  176. 000001E4  2A5F                     movea.l    A5, [A7]+
  177. 000001E6  21DF 0904                move.l     [0x00000904 /* CurrentA5 */], [A7]+
  178. label000001EA:
  179. 000001EA  4E5E                     unlink     A6
  180. 000001EC  4E75                     rts
  181.